home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 2001 #9 / CD 9 (Black) - 2001.iso / K-CS.dcr / 00380.ls < prev    next >
Encoding:
Text File  |  2001-05-17  |  297 b   |  17 lines

  1. global BlinkObjekt
  2.  
  3. on new me
  4.   cursor(0)
  5.   repeat with taeller = 62 to 87
  6.     set the visible of sprite taeller to 0
  7.   end repeat
  8.   set BlinkObject to 0
  9.   set the locH of sprite 99 to 780
  10.   set BlinkObjekt to new(script "Blink", 4, 80)
  11. end
  12.  
  13. on exitFrame
  14.   checkBlink(BlinkObjekt)
  15.   go(#loop)
  16. end
  17.